﻿Imports DAO
Public Class ThamSoBUS
    Public Function LayDanhSach() As IList
        'Kiem tra Business Rule neu co
        Dim ds As IList
        Dim thamsoDao As New ThamSoDAO()
        ds = thamsoDao.LayDanhSach()
        Return ds
    End Function
    Public Function LayBang() As DataTable
        'Kiem tra Business Rule neu co
        Dim dt As DataTable
        Dim thamsoDao As New ThamSoDAO()
        dt = thamsoDao.LayBang()
        Return dt
    End Function
    Public Shared Function suathamso(ByVal ts As DTO.ThamSoDTO) As DataTable
        'Kiem tra Business Rule neu co
        Dim dt As DataTable
        dt = ThamSoDAO.SuaThamSo(ts)
        Return dt
    End Function
End Class
